home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / PadHop.dxr / Internal_9_lilli pad rotation.ls < prev    next >
Encoding:
Text File  |  2002-01-31  |  581 b   |  27 lines

  1. property pSprite, spriteNum, pFrogOn, pFla, pLoc, pdir, pIn, pFreq, psk
  2.  
  3. on beginSprite me
  4.   pSprite = sprite(spriteNum)
  5.   psk = the ticks
  6.   timeout("lilli" && spriteNum.string).new(25, #movepad, me)
  7. end
  8.  
  9. on movepad me
  10.   if not isFrogOn(pSprite) then
  11.     pSprite.rotation = pSprite.rotation + 0.08
  12.   end if
  13.   if pFla then
  14.     pSprite.locH = pSprite.locH + pdir
  15.     ass = pSprite.locH
  16.     if ass > (pLoc + 50) then
  17.       pdir = -pdir
  18.     else
  19.       if ass < (pLoc - 50) then
  20.         pdir = -pdir
  21.       end if
  22.     end if
  23.   end if
  24.   if pIn and not isFrogOn(pSprite) then
  25.   end if
  26. end
  27.